clear
use widerentdata
forvalues j=1/11 {

	pperron bls`j', lags(2)
	pperron rri`j', lags(2)
	vecrank rri`j' bls`j', lags(2)
	quietly: var d.rri`j' d.bls`j', lags(1 2 3 4)
	vargranger
	}
